home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1987 December
/
Ahoy_Magazine_87-12_1987_Double_L.d64
/
Flip Flop
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
611b
|
14 lines
100 print"[147][198]lip [198]lop":list63000-63006
63000 s=49152:rem *** change s to 4864 for the c-128 ***
63002 rem *** s can also be changed to relocate in both computers ***
63004 forj=stos+92:reada:pokej,a:x=x+a:nextj
63006 ifx<>14751thenprint"error in data...":end
63008 data169,4,162,216,160,0,133,252,134,254,132,251
63010 data132,253,169,7,162,219,160,231,133,100,134,102
63012 data132,99,132,101,160,0,177,99,72,177,101,72
63014 data177,251,145,99,177,253,145,101,104,145,253,104
63016 data145,251,162,0,232,208,253,165,99,208,10,198
63018 data100,198,102,165,100,201,3,240,16,198,99,198
63020 data101,230,251,230,253,208,205,230,252,230,254,208
63022 data199,32,228,255,240,166,133,254,96